R/create all variables for testing.R

In nikosbosse/SAE: This Package implements a Small Area Estimation approach from Elbers. et al blabla

# x <- data(brazil, package = "SAE")
#
# helper <- sample(x = 1:nrow(x), size = nrow(x)/5, replace = F)
# helper <- sort(helper)
# # training data set = 20%, test data set = 80%
#
#
# #--- create training and test set from the originial data set using the indexes --#
# census <- x[helper,]
# survey <- x[-helper,]
#
# ?data